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S-C Macro Assembler /// 


The Apple /// version of the S-C Macro Assembler is coming 
right along! I am now selling a preliminary "as is" version 
for $100. That buys you the assembler, a few pages of 
documentation about the differences from the Apple ][ version, 
and free updates until the finished product appears. This is a 
working assembler for producing free-running programs; it 
assembles itself just fine. The biggest gap is the ability to 
produce relocatable modules for Pascal or BASIC. That will be 
added next. Call or write if you are interested in being among 
the first to have this new enhancement to the Apple ///. 


zero-Insertion-Force Game Socket Extender 


One of the first things I did to my Apple back in 1977 was to 
plug a ZIF socket into the game connector. Not too easy, 
because it first has to be soldered to a header, but I did it. 


Now I have discovered a source for a ready-made device that 
does the same thing, plus brings the socket outside the Apple 
(if you so desire). There's a picture of the device on page 
14. For only $20 I'll send you one! 


Really Adding ASCII Strings...........+--.-.eBOb Sander~Cederlof 


Last month I promised a “reasonably useful" program to add two 
numbers together from ASCII strings. I promised: 


* Callable from Applesoft, using &. 

* Automatic passing of string parameters. 

* Allow operands of unequal length. 

* Automatic alignment of decimal points. 

* Allow negative numbers. 

* Handle sums longer than operands. 

* Allow leading blanks on operands. 

* Allow operands and results up to 253 bytes long! 


Okay! It took me three days, but I did it! Of course, the 
program has grown from 12 lines and 26 bytes of code to over 
290 lines and over 450 bytes, too. 


The program is now assembled to load at $9000, but you can 
choose other positions by changing line 1130. I set 
HIMEM: 36864 before doing anything else in the Applesoft 
program, and then BRUN B.STRING ADDER. 


When B.STRING ADDER is BRUN, only the setup code in lines 
1160-1220 is executed. What this does is link in the ampersand 
(&) to the body of my program. Once the "&" is linked, my 
program responds to a call like "& +$,A$,B$,C$" by adding the 
numeric values represented in ASCII in AS and B$ and storing 
the sum as a string in CS. 


When an &-line occurs, Applesoft branches to my line 1520. 
Lines 1520-1600 check for the characters "+$," after the 
ampersand. If you don't like those characters, change them to 
something else. Anyway, if the characters do not match, you 
get SYNTAX ERROR. If they do match, it is time to collect the 
three strings variables. 


Lines 1620-1690 collect the three string variables. The first 
two are the operands, the third is the result string. I save 
the address and length of the actual data of the operand 
strings. All I save at this point for the result string is the 
address of the variable descriptor. I call the subroutine 
PARSE.STRING.NAME to check for a leading comma, search for the 
variable name, and store the length and address of the 
referenced string data. 


Lines 1730-1860 scan each operand string in turn to find the 
decimal point position. The routine SCAN divides a string at 
the decimal point (or where the decimal point would be if there 
was one), and returns in Y the number of characters to the left 
of the decimal point. SCAN returns in X the count of the 
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S-C Macro Assembler (the best there iS!) ... cc ccc cc cece cece cece cece o $80.00 

Upgrade from Version 4.0 tO MACRO... ..ccccccccccccccccccccceveveses 92190 

Source code of Version 4.0 On GiSk....cccccrcecrvcecccevssccsesesse SI. 00 
Fully commented, easy to understand, and modify to your own tastes. 

S-C Macro Assembler /// ..cccoccccccccccccccccescsesscsccceccceces es SlL00.00 
Preliminary version. Call or write for details. 


Applesoft Source Code On DiSk...ccecrcccccccccncccccccccccccccssee es 900.00 
Very heavily commented. Requires Applesoft and S-C Assembler. 
ES-CAPE: Extended S-C Applesoft Program EditOr.....crccccccccccee e $60.00 
AAL Quarterly DiSkKS.ccccccccccvcceccccccccccccccccccesccccc ce CaACN $15.00 
Each disk contains all the source code from three issues of "Apple 
Assembly Line", to save you lots of typing and testing time. 
QD#1l: Oct-Dec 1980 QD#2: Jan-Mar 1981 QD#3: Apr-Jun 1981 
QD#4: Jul-Sep 1981 QD#5: Oct-Dec 1981 QD#6: Jan-Mar 1982 
QD#7: Apr-Jun 1982 QD#8: Jul-Sep 1982 QD#9: Oct-Dec 1982 


Double Precision Floating Point for AppleSOft.....cccccccceescccese S000 
Provides 2l-digit precision for Applesoft programs. 
Includes sample Applesoft subroutines for standard math functions. 


FLASH! Integer BASIC Compiler (Laumer Research)....cceecsecccccess $79.00 
Source Code for FLASH! Runtime Package... .ccccccccccccscccccccccceve eS 39200 


Super Disk Copy III (Sensible Software)........++e.. (reg. $30.00) $27.00 
Amper-Magic (Anthro-Digital) ....ccccccccvecccvevecseee (LEG. $75.00) $67.50 
Amper-Magic Volume 2 (Anthro-Digital) .....eeccccceeee (rEG. $35.00) $30.00 
Quick-Trace (Anthro-Digital)......cccccencvvevvecseee (LEG. $50.00) $45.00 


Cross-Reference and Dis-Assembler (Rak-Ware) ..ccccccccccccccccccc ce 945.00 
The Incredible JACK! .c. ccc ccc ccc ccc ccc cc ccc cc ccc ccc ccc esc ccc ccc ccc ce 919400 


Blank Diskettes (with hub rings)........22+e6e2-epackage of 20 for $50.00 
Small 3-ring binder with 10 vinyl disk pages and disks........+222-936.00 
Vinyl disk pages, 6"x8.5", hold one disk each................10 for $6.00 
Reload your own NEC PC-8023 ribbon cartridges...........each ribbon $5.00 
Reload your own NEC Spinwriter Multi-Strike Film cartridges....each $2.50 
Diskette Mailing ProtectOrS....ccccccccvccrscccceseeelL0~-99: 40 cents each 

100 or more:. 25 cents each 


Ashby Shift-Key MOG. ccccccccccc ccc cece ccc cece cc ccc cece ccc ccc ccc ccc e 915.00 
Lower-Case Display Encoder ROM... ccc cccccc ccc ccccccccvccceseccess 920000 
Only Revision level 7 or later Apples. 


Books, BOOkS, BOOKS...cccccccccccccccsceceeess Compare Our discount prices! 


"Enhancing Your Apple II, vol. 1", Lancaster......... ($15.95) © $15.00 
"Incredible Secret Money Machine", Lancaster.........-. ($7.95) $7.50 
"Micro Cookbook, vol. 1", Lancaster...cccccccccccceee ($15.95) $15.00 
"Beneath Apple DOS", Worth & LeChHner....cecccsecscees (919.95) $18.00 
"Bag of Tricks", Worth & Lechner, with diskette......($39.95) $36.00 
"Apple Graphics & Arcade Game Design", Stanton.......($19.95) $18.00 
"Assembly Lines: The Book", Roger Wagner....ceecccses ($19.95) $18.00 
"What's Where in the Apple", Second Edition.......... ($24.95) $23.00 
"What's Where Guide" (updates first edition).......... ($9.95) $9.00 
"6502 Assembly Language Programming”, Leventhal......($16.99) $16.00 
"6502 Subroutines", Leventhal... ccccccccccccccvecceses (912.99) $12.00 
"MICRO on the Apple--1", includes diskette........... ($24.95) $23.00 
"MICRO on the Apple--2", includes diskette.........-. ($24.95) $23.00 
"MICRO on the Apple--3", includes diskette........... ($24.95) $23.00 


Add $1 per book for US postage. 


*** S-C SOFTWARE, P. O. BOX 280300, Dallas, TX 75228 
ate (214) 324-2050 
*** We take Master Charge, VISA and American Express *** 


rkaxk 
kkk 


Foreign orders add postage needed. 
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number of characters on the right end, including the decimal 
point. I save the “digits.after" parts of both strings, and 
also the maxima of the two parts. The maxima describe the 
result string (almost). 


Lines 1900-2000 finish the description of the result string, by 
lengthening the integral (left) side by two characters. These 
two characters allow for extension of the result by carry, and 
for representation of the sign of the result using ten's 
complement notation. At this point I also clear the necessary 
bytes of the result to zero, so the buffer can be used as an 
accumulator. 


Now comes the EASY part. Lines 2040-2100 add each operand in 
turn to the buffer contents. EASY. Just call the subroutine 
ADD.TO.BUFFER, and it's done! Don't worry, I'll amplify later. 


In ten's complement notation, if the first digit is 0-4 the 
number is positive; if the first digit is 5-9, the number is 
negative. For example, 1234 looks like 001234; -1234 becomes 
998766. Ten's complement means in decimal the same thing two's 
complement means in binary. I can form the ten's complement by 
subtracting the number from a power of ten equal to the number 
of digits in the result. In that example, 1000000-1234=998766. 
Note that the ten's complement is equal to the nine's 
complement plus one. (Since 10=9+1.) 


Lines 2140-2410 convert the buffer contents from the ten's 
complement numeric notation back to ASCII. Lines 2140-2180 set 
or clear the CARRY and TENS.FLAG sign bits according to the 
first digit in the buffer. A negative number, with a first 
digit of 5-9, causes both of these variables to get a value of 
the form 1xxxxxxx. 


Lines 2190-2360 scan through the number from right to left, 
making the ten's complement if the number was negative, and 
converting each digit to ASCII. Lines 2370-2400 store a minus 
Sign in the first digit position if the result is negative. 


Line 2410 calls a subroutine to chop off leading zeros, and 
move the minus sign if there is one. You may justifiably ask, 
"Why did you call a subroutine rather than use in-line code?" 
Because when I wrote it in-line, the local labels stretched out 
too far from the major label STRADD and caused an assembly 
error. Also, sometimes I use subroutines for clarity, even 
when the subroutine is only called once, 


The final step is to pack the resulting string up and ship it 
to the result string variable. Lines 2450-2590 do just that. 
AS.GETSPA makes room at the bottom of string pool space, and 
AS.MOVSTR copies the string data. C'est finis! 


Lines 2640-3100 do the actual addition. On entry, X is either 
0 or 4, selecting either the first or second operand. 
SETUP.OPERAND copies the string address into VARPNT, and 
retrieves the length of the string. Lines 2690-2760 set or 
Clear the TENS.FLAG and CARRY variables according to the sign 
of the operand. 
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Lines 2780-2810 compute the position in the buffer at which the 
operand will be aligned properly. We saved the size of the 
integral (left) side of the buffer in MAX.DIGITS.BEFORE. That 
plus the lenght of the fractional side of the operand tells us 
where this operand aligns. Since we are using ten's complement 
for negative numbers, rather than nine's complement, we don't 
have to worry about extending the fractional parts to the same 
length. We can just start adding at the end of the current 
operand. (In ten's complement form fractional extensions are 
zeros; in nine's complement form, the extension digits would 
all be nines.) 


Lines 2830-3100 do the addition. xX points into the buffer, and 
Y points into the operand string. To start with, both X and Y 
point just past the end; therefore the loop BEGINS with a 
test-and-decrement sequence. I first t-a-d the buffer pointer; 
if it is zero, all is finished. If not, on to t-a-d the string 
pointer. If it is zero, there are still digits left in the 
buffer, so I use an assumed leading zero digit for the operand. 
We still may have carries to propagate across the rest of the 
sum, 


Assuming neither pointer is zero, line 2900 gets the next digit 
from the operand string. If it is a decimal point, I just 
store the decimal point ASCII value into the buffer. If you 
want to be able to ignore leading blanks, insert the following 
two lines between line 2920 and 2930: 


2924 CMP #' BLANK? 
2925 BEQ .3 YES, USE ZERO. 


I left them out in my version, because I forgot I promised it 
to you, 


If the character is not a decimal point (or blank), it may be a 
minus sign or digit. I did not put any error checking in my 
program for other extraneous characters; if you try them, you 
will get extraneous results! I treat a sign as a leading zero 
in the: arithmetic loop. 


If the character is a digit, or an assumed leading zero, we can 
add it to the buffer's value. Lines 2960-3010 will complement 
the digit if the operand had a minus sign. Lines 3020-3070 add 
the current operand digit (or its complement) to the current 
buffer digit, plus any carry hung over from the preceding 
digit, and save the resulting carry in CARRY. 


That's it! Now here is a short little Applesoft program to 
test the code. 


100 REM TEST&+S,AS,BS 

110 HIMEM: 36864: PRINT CHRS (4)"BLOAD B.STRING ADDER": 
CALL 36864 

120 INPUT AS: INPUT BS 

130 & + $,A$,BS,C$ 

140 PRINT C$: GOTO 120 
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QuicKTRACE 


relocatable program traces:and displays the actual machine operations, while it is running 
without interfering with those operations. Look at these FEATURES: 


Single-Step mode displays the last instruction, 
next instruction, registers, flags, stack contents, 
and six user-definable memory locations. 


Trace mode gives a running display of the Single- 
Step information and can be made to stop upon 
encountering any of nine user-definable 
conditions. 


Background mode permits tracing with no display 
until it is desired. Debugged routines run at near 
normal speed until one of the stopping cond- 
itions is met, which causes the program to return 
to Single-Step. 


QUICK TRACE allows changes fo the stack, 
registers, stopping conditions, addresses to be 
displayed, and output destinations for all this 
information. All this can be done in Single-Step 
mode while running. 


Two optional display formats can show a sequence 
of operations at once. Usually, the information 
is given in four lines at the bottom of the screen. 


QUICK TRACE is completely transparent to the 
program being traced. It will not interfere with 
the stack, program, or I/O. 


QUICK TRACE is relocatable to any free part of 
memory. Its output can be sent to any slot or to 
the screen. 


QUICK TRACE is completely compatible with 
programs using Applesoft and Integer BASICs, 
graphics, and DOS. (Time dependent DOS 
operations can be bypassed.) It will display the 
graphics on the screen while QUICK TRACE Is 
alive. 


QUICK TRACE is a beautiful way to show the 
incredibly complex sequence of operations that 
a computer goes through in executing a program 


Quick TRACE $50 


Is a trademark of Anthro-Digital, Inc. 
Copyright © 1981 
Written by John Rogers 


See these programs at participating Computerland and other 


fine computer stores. 


Anthro - Digital Software, Inc. 


P.O. Box 1385 Pittsfield, MA 01202 
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SCAN BOTH STRINGS TO DETERMINE BUFFER PARAMETE 
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ADD A$ TO BUFFER 
JSR ADD.TO.BUFFER 
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POINT AT C$ DATA 


R AS.GETSPA 
(VARPNT),Y 
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R 
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D 
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PUT (BUFFER) IN OUTPUT STRING 


JSR SETUP.OPERAND 


LDX #8 


4 FOR B$ 


DD.TO.BUFFER 


X= 


"ADD STRING TO BUFFER. 
ENTER WITH X=0 FOR A$, 


# 
® 
# 
# 
A 


STRING LENGTH 
CHECK FOR MINUS SIGN 
T 
R 
x R 1XXXXXXX 


~-DIGITS.AFTER,X 


ARPNT,X) 
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A = OG 
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S-C Macro Cross Assemblers 


The high cost of dedicated microprocessor development systems has 
forced many technical people to look for alternate methods to develop 
programs for the various popular microprocessors. Combining’ the 
versatile Apple II with the S-C Macro Assembler provides a cost 
effective and powérful development system. Hobbyists and engineers 
alike will find the friendly combination the easiest and best way to 
extend their skills to other microprocessors. 


The S-C Macro Cross Assemblers are all identical in operation to the 
S-C Macro Assembler; only the language assembled is different. They 
are sold as upgrade packages to the S-C Macro Assembler. The S-C 
Macro Assembler, complete with 100-page reference manual, costs $80; 
once you have it, you may add as many Cross Assemblers as you wish at 
a nominal price. The following S-C Macro Cross Assembler versions are 
now available, or soon will be: 


Motorola: 6800/6801/6802 now $32.50 
6805 now $32.50 
6809 now $32.50 
68000 now $50 
Intel: 8048 now $32.50 
8051 soon $32.50 
8085 soon $32.50 
Zilog: Z-80 now $32.50 
RCA: 1802/1805 soon $32.50 
Rockwell: 65C02 now $20 
The S-C Macro Assembler family is well known for its ease-of-use and 
powerful features. Thousands of users in over 30 countries and in 
every type of industry attest to its speed, dependablility, and 
user-friendliness. There are 20 assembler directives to provide 


powerful macros, conditional assembly, and flexible data generation. 
INCLUDE and TARGET FILE capabilities allow source programs to be as 
large as your disk space. The integrated, co-resident source program 
editor provides global search and replace, move, and edit. The EDIT 
command has 15 sub-commands combined with global selection. 


Each S-C Assembler diskette contains two complete ready-to-run 
assemblers: one is for execution in the mother-board RAM; the other 
executes in a 16K RAM Card. The HELLO program offers menu selection 
to load the version you desire. The disks may be copied using any 
Standard Apple disk copy program, and copies of the assembler may be 
BSAVEd on your working disks. 


S-C Software Corporation has frequently been commended for outstanding 


support: competent telephone help, a monthly (by subscription) 
newsletter, continuing enhancements, and excellent upgrade policies. 


S-C Software Corporation (214) 324-2050 
P.O. Box 280300, Dallas, Texas, 75228 
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Apple Assembly Line.. 


More on the Macro-Videx Connection......ecccecccecee Bill Linn 


Don Taylor's original article in the August (1982) issue of AAL 
and Mike Laumer's follow-up the next month gave us the patches 
for running the S-C Macro Assembler in conjunction with the 
Videx 80-column hoard. I recently purchased a Videx card in 
order to implement the 80-column version of ES-CAPE, so I 
installed the patches. 


I have really enjoyed using the Macro assembler in 80-column 
mode. Naturally, though, I couldn't resist adding a few 
enhancements to Don's and Mike's work. 


Mike added the right arrow code, which copies characters off 
the Videx screen, but he stopped short of implementing the 
Escape-L LOAD sequence. To install the following code, you 
will need to change line 3080 in Don's article to point to my 
routine. Change it to "3080 ~-DA MY.ESC.L-1". Also, the STX 
instruction at line 4235 in Mike's article must be labelled 
GETCH. 


SCM.INSTALL .EQ SCM.BASE+S$52A 
* 


MY.ESC.L 
CPX #0 CURSOR AT BEGINNING? 
BEQ .1 YES, CONTINUE 
JMP SCM.ESC.L NO, LET S-C HANDLE IT 
ol LDA #0 CONNECT DOS 
STA SAA52 BY SETTING INTERCEPT STATE = 0 
LDA #$84 SEND A CTRL-D 
JSR MON.COUT 
2 LDA LOADCMD , X 


JSR SCM.INSTALL 
JSR FAKE.COUT 
#6 


CPX 
BCC .2 

23 STX $406 SAVE CHAR POS'N 
JSR GETCH GET SCREEN CHAR 
LDX $406 RESTORE POS 'N 


JSR SCM. INSTALL 
JSR FAKE.COUT 


CPX #40 40 CHARS SENT YET? 
BNE .3 NO, LOOP BACK 
JMP CLREOP CLEAR TO END OF PAGE 
* AND EXIT 
 ] 
LOADCMD »AS -/LOAD / 
ce ee ce ee ee oe oe we ae i ee me ee eee ee ee 


Secondly, I wanted a longer "*---" line on my screen, so I 
changed {it to 68 characters instead of 38. This uses more of 
the WO column screen, without wrapping around during assembly. 
To make thiw modification insert the following two lines after 
the label “INSTALL.PATCHES" in Don's original listing: 


LDA @6tl 
WTA HUM WABE+$494 
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Finally, I changed the dimensions of the Videx cursor so that 
it looks like a blinking underline instead of a blinking block. 
(Users of my ES-CAPE are already familiar with my love for the 
blinking underline!) Insert the following lines immediately 
after the "INSTALL.VECTORS"” label: 


LDA #S$0A VIDEX REGISTER 10 
STA V.DEVO 

LDA #$68 

STA V.DEV0+1 

LDA #$0B VIDEX REGISTER 11 
STA V.DEVO 

LDA #$08 

STA V.DEVO+1 


Speaking of ES-CAPE, I am making progress on Version 2 and have 
included suggestions from many of you. If you have others, 
please drop me a line soon at 3199 Hammock Creek, Lithonia, GA 
30058, or call evenings at (404) 483-7637. 


DISASM (Version 2.2) $30.00 
Use DISASN, the intelligent disassembler, to convert 6502 machine code into meaningful, symbolic source. 
It creates a text file which is directly compatable with DOS ToolKit, LISA and S-C (both 4.0 & Macro) 
Assemblers. Use DISASM to customize existing machine language programs to your own needs or just to see 
how they work. DISASH handles multiple data tables, invalid op codes and displaced object code (the 
program being disassembled doesn’t have to reside in the memory space in which it executes). DISASM lets 
you even substitute MEANINGFUL labels of your own choice (100 commonly used Monitor & Pg Zero names 
included in Source form to get you rolling). The address-based cross reference table option results in 
either a selective or complete cross reference (to either screen or printer). Page Zero and External 
references are listed separately in numeric order. The cross reference table provides as much insight 
into the inner workings of machine language programs as the disassembly itself. DISASH has proven to be 
an invaluable aid for both the novice and expert alike. 


Utilities For Your S-C Assembler (4.0) 
SC.6SR: A Global Search and Replace Eliminates Tedious Manual Renaming Of Labels.......:.0s00+0-820.00 


SC.XREF: A Linenumber-Based Global Cross Reference Table For Complete Source Documentation......$20.00 
SC.TAB: Tabulates Source Files Into Neat, Readable Form. Encourages Fast, Free-Format Entry....$15.00 
SC UTILITY PAK: Includes All Three Utilities Described Above (You Save $10.00)......scccceseese 845.00 


All of the above programs are written entriely in machine language and are provided 
on a Standard 3.3 DOS formatted diskette. 


Avoid A $3.00 Shipping/Handl ing Charge By Mailing Full Payment With Order 
RAK -~-WA RE 
41 Ralph Road 
West Orange NJ 07052 


aaat# SAY YOU SAW IT IN “APPLE ASSEMBLY LINE’! tenes 
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On CATALOG ARRANGER and RAM Card DOS 


Chuck Welman just called to report <i 
some errors in the January piece on Lf 
using CATALOG ARRANGER with a | 
relocated DOS. He says that the PLUGS INTO 
sentence about where to put the BIT GAME PORT 


MONREAD statements had problems. 
Here's his corrected version: 


"Then add BIT MONREAD at these 
positions: Lines 1675, 3775, 3895, 


3955, 4015 (".5" moved to this line), FLAT CABLE 
4205 (".3" moved to this line, 4315, 

4425, 4455 (".7" moved to this line), PRESSURE 

and 4895." SENSITIVE 


BACKING 
FOR EASY 
Chuck also passed along instructions MOUNTING 
for uSing FILENAME EDITPOR with a RAM 


Card DOS. Here are his additions: 


2635 .3 BIT MONREAD 
2640 JSR MON. BELL 
2642 BIT DOSREAD 
2644 BIT DOSREAD 
2646 RTS 


Thanks to all of you for showing your 
appreciation for these programs. 


Quickie No. 6.....Bob Sander-Cederlof 


Here is a little run-anywhere program 
sure to wake up the neighborhood dogs. 
Put it in your program as a last 


. @FORCE 16-PIN 
resort to get attention, because the INSERTION 


only escape is by RESET or power-off. SOCKET 

1000 ALARM INY INCREMENT DELAY 

TIME e Extends game port outside 
1010 TYA computer with 3-foot cable. 
1020 TAX DELAY COUNT TO X e Prolongs life of game acces- 
1030 LDA $C030 TOGGLE SPEAKER sories with 8-Force insertion 
1040 .1 DEX DELAY LOOP socket. 

1050 BNE .1 e Mounts anywhere in seconds 
1060 BEOQ ALARM ....FOREVER.... with pressure sensitive 


backing. 


; e Offers better performance and 
That's it, only eleven bytes! For a reliability with high grade 


Slightly different effect, change the components. 
"DEX" in line 1030 to "INX". 
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Patch to Fix .TI Problem......c.ccccccscecescsecceeeeeMike Laumer 


You may have noticed the annoying problem with the .TI 
directive, in which there is sometimes a blank line after the 
title line and sometimes not. The blank line is there when the 
page break is forced with a .PG directive, but not when it is 
caused by merely filling a page. . 


The following little patch will fix it. I haven't put a 
definite address on the patch, because I don't know what other 


patches you may already have appended to the assembler. Just 
find an empty place and plop it in! 


Motherboard version: :$21F0:4C xx yy (was 20 CF 2C) 
:Syyxx:20 CF 2C 4C E3 21 


RAM Card version: :$E33C:4C xx yy (was 20 1B EE) 
:Syyxx:20 1B EE 4C 2F E3 


Another .TI problem of which I am aware is that the line count 
is messed up on the first page of the symbol table listing. 
This is caused by the fact that the extra carriage returns in 
the "SYMBOL TABLE" message are not counted. You can clean up 
the appearance by making the last line of your source program 
be ".PG"; this forces the symbol] table to start on a fresh 


page. 


“Oops-Proof’ 
Your 
Disk IL 


"OOPS!!! #8187811 I just wrote over a valu- THE DI W 
able disk file (forgot to put on a write- E DISK SWITCH 


protect tab)". If this hasn't happened to 
you, it's just a matter of time! A CMW Disk 
Switech® wil) help prevent these accidents, and 
will give you new features, too. It provides Fully assembled and tested 


Total control of write protect status 
Positive status indication (Green/Red LEDs) 
Attractive switchplate matches drive decor 


manual control and positive indication of your 
disk drive's write protect status. Switch to 
tebe suoce te Pr eneeka esting, even without a 
ab. wite o mode to override a tab Model DSA-2 (w/A coece . 

or write to an unnotched diskette. Select Model DSA-1 (a/ppeie treet) I $38.96 
"NORMAL® mode for normal tab sensing. Model Model DSK-1 (kit of parts; installs in 

DSA-2 consists of a Disk Switch installed in a your drive faceplate) coccccecee $11.95 
replacement Disk 1{® faceplate. It installs Models for non-Apple drives: write CMW. 

in minutes, and requires only five easy solder 
connections. 


Installs in minutes; full instructions 
Drive easily restored to original condition 


Add $2.00 ~ shipping OH add 5.5% sales tax 
Visa, MC, MO, Check, COD (add $1.40) 


OTHER FINE CMW PRODUCTS Disk ]{ is a trademark of Apple Computer Ine 


The PROM Switch - Model PS-1 
Switch 1 of 3 ROMs/EPROMS into DO-F8. 


"PROMETTE"® EPROM Carrier - Model PC_1 Computer Micro Wonxs, Inc 
Adapts a 2716 EPROM to DO-F8 sockets. P.0. Bes 33451 = Dayton, Obie 45433 


Write or call for a catalog. (305) 777-0268 (FL sales office) 
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Apple //e NOteS..cciccccvcccccccccecccccccee eo BOD Sander-Cederlof 


We don't have one yet, but we did play with one for about an 
hour last week. All our software works fine, as long as you 
stay in the 40-column caps-lock mode. We will be making new 
versions available in the near future which take full advantage 
of the extended memory, lower-case, and 80-column display. 


The best write-up I have seen yet on the //e is in the February 
1983 Apple Orchard (published by the International Apple Core, 
908 George St., Santa Clara, CA 95050). 


Here are some of the things that caught my attention: 
* Real shift key, and a caps-lock key. 


* Open-Apple and Closed-Apple keys, which duplicate the first 
two paddle buttons. 


* Recessed RESET key. CTRL-RESET required (no longer a 
Switchable option). CTRL-Closed-Apple-RESET starts a memory 
test program. 


* Two 8K ROMS, instead of six 2K ROMS. The extra 2K of ROM 
Space is used by the modified Monitor program. Fancy 
soft-switches map the extra 2K into the SCOOO-C7FF space. 
These sockets are supposedly compatible with 2764 EPROMs. 


* Apparently the Monitor now uses (clobbers) zero-page 
locations $08 and S$I1F. 


* Up- and down-arrows on the keyboard. Down is CTRL-J, or 
linefeed. Up is CTRL-K. 


* The keyboard includes all the ASCII set, even $7F (DELETE, 
or RUBOUT). 


* 64K RAM on the motherboard. This simulates an Apple II Plus 
with a 16K RAM card in slot 0. 


* New slot instead of slot 0, with 60-pin connector (other 
slots still have 50-pin connectors). Apple's 80-column card 
plugs in here. The extra pins carry other signals not 
normally available at the slots. Look for some amazing new 
combined function cards from the peripheral-card makers for 
this slot! I wouldn't be surprised to find ads real soon 
for 256K RAM cards including 80-column support, clock- 
calendar, serial/parallel interfaces, and all on one card. 


* 80-column card with or without extra 64K RAM. But this 64K 
RAM is soft-switched in a totally different manner. It maps 
over the same space as the motherboard 64K, with switches to 
map portions such as page-zero, text screen, hi-res screen, 
and so on. 
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* Now you can READ the state of most of the soft-switches. 


Bit 7 (high bit) tells the state, as follows: 
$C013 -- RAMREAD 
$C014 -- RAMWRT 
$C015 -- SLOTCXROM/CX00ROM 
$C016 -- ALTZP/MAIN 
$C017 -- SLOTC3ROM/SLOTROM 
$C018 -- 80 COL STORE 
$C019 -- VERTICAL BLANKING 
SCO1A -- TEXT 
SCO1B -- MIXED MODE 
S$CO1C -- PAGE2 
S$CO1D -- HIRES 
SCO1E -- ALTCHAR 
SCO1F -- 80 COL DISP 


* Yes, you saw right...the vertical blanking signal is now 
readable! So lovers of Lancaster's Enhancements can 
continue to tinker! 


* Inverse lower-case display is selectable, at the expense of 
the flashing mode. 


* The cursor display is different. A small checkerboard 
alternates with the character under the cursor in 40-column 
mode. In 80-column mode an inverse blank is the normal 
cursor, and an inverse "+" is used when in escape-mode, 


Whether we view the changes as improvements or not, the //e 
will very soon be the standard we all have to deal with. The 
same situation arose when Apple switched from II to II Plus. A 
year from now, when 300,000 have been sold, we will wonder how 
we ever lived without it! 


Macro Assembler Patch 
Peter Bartlett, of Chicago, has reported an unpublished limit 
on the number of Target Files that can be generated by one 
assembly. Right now there can only be 31; above that number 
the load address and length bytes go astray. If you need more 
than 31 files from one assembly, you can make the following 
patches: 
Regular version 

:$29EA:3F 
Language Card version 

:$C083 C083 EB36:3F N C080 


These patches will allow you to have up to 63 target files. 
That should be plenty! 
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TRAPPER: An Applesoft Input Tuner..............Allen Marsalis 


How would you like a radio which played every available station 
at one time? Well that's how I sometimes feel about using 
Applesoft's INPUT statement. I want to be able to "tune in" on 
the character(s) of the input stream, in much the same way as a 
radio tunes into a station. Applesoft's INPUT statement, 
however, accepts all characters typed into the keyboard and 
allows up to 255 of them. This means that I have to do a lot 
of checking and monitoring of string lengths and characters to 
avoid input errors. 


For example, when answering a Y or N question, what happens 
when the user inputs “WXYZ"? Provisions are needed within the 
program to guard against such errors. This can be very 
inconvenient and space-consuming, yet it is essential for good 
programming. 


A better example occurs when you are creating a disk file. 
Field lengths and data types are often restricted, such as ina 
name, address, or social security number. A SSN, for instance, 
has a fixed length and must be constructed of numbers only. 
Checking a field such as this can be very time consuming and 
lengthy. In fact, it seems that a quarter of the contents of 
my Applesoft programs does nothing but check on field lengths, 
option boundaries, and other input checks. 


So, I set out to create an input routine which would allow 
Applesoft to "tune" into the characters specified and also 
monitor the field length. I've seen several input routines 
such as this on larger systems, but all had one disadvantage: 
Only a fixed number of options were available, such as alpha 
only, numeric only, and (Y or N) input. More options available 
meant more parameters were necesSary, making the systems more 
cumbersome to work with. After much thought I decided on a 
totally new approach which would allow almost limitless control 
of input. I christened this routine TRAPPER for “Tuning and 
Regulating APPlesoft Entries by Restriction." 


TRAPPER employs a coded restriction string (not unlike 
Applesoft's IF expression) to tune out the characters I don't 
want to accept. TRAPPER is then, in essence, a tiny 
interactive interpreter that provides a short, convenient 
method of filtering out any unwanted characters in the input. 
Here's how it works. 


TRAPPER uses three parameters as follows: 


Syntax: & INPUT (A, BS, C$) 
A: Input field length (real expression) 
BS: Coded restriction string (string expression) 
includes: > < = ' AND OR NOT <sp> <single char> 
C$: Input string (string variable) 
variable to receive input 
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As I have said, the restriction string is a simple relational 


expression as is used by Applesoft's IF statement. 


It is 


constructed of the following special characters and rules: 


1) < > = are its relational operators 
2) AND OR NOT are its logical operators 
3) Blanks are allowed anywhere within the expression, 
but lengthy expressions increase the delay between 
keystrokes. 
4) One and only one character is allowed within single 
quotes. 
5) <cr> and <-- have special functions and cannot be 
trapped. 
6) Parentheses are not yet implemented. 
EXAMPLES : 
YNS = " ='y' OR ='N' * sREM (Y OR N) ONLY 
NOSP$ = " NOT =' ' * :REM NO SPACES ALLOWED 
MENUS = " NOT <'l‘ AND NOT >'4' " :REM ALLOWS 1 THRU 4 
WAITCRS = "* :REM WAIT FOR A <CR> 


After using 
in the size 


Trapper awhile, 
of my Applesoft programs, 
trapping than ever before possible. 


a significant reduction 
with even better error 
And it doesn't print that 


I noticed 


leading question mark which I never did like (not all input 
prompts are questions.) 


For a 48K Apple, DOS sets HIMEM at $9600. 


Trapper resides just 


below this at $9300 and moves HIMEM down to that point. 
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SAVE S.TRAPPER 


. TRAPPER, BY ALLEN MARSALIS 
-OR $9300 

. .TF B. TRAPPER . 

RLEN -EQ $1A RESTRICTION STRING 

RSTR ~EQ $1B DESCRIPTOR 

TEMPPT .EQ $52 . 

LASTPT .EQ $53 

FRESPC .EQ $71,72 

HIMEM .EQ (3598 

VARPNT .EQ 3 4 

FACMO -EQ $A 

BUF -EQ $200 INPUT BUFFER 

AMPVEC .EQ $3F5 AMPERSAND VECTOR 

STROBE -EQ $C010 KEYBOARD STROBE 

AS.FRMNUM .EQ $DD67 EVALUATE NUMERIC FORMULA 

AS.CHKSTR .EQ $DD6C REQUIRE STRING 

AS.FRMEVL .EQ $DD7B EVALUATE GENERAL FORMULA 

AS.CHKCLS .EQ $DEB8 REQUIRE ")" 

AS.CHKCOM .EQ $DEBE REQUIRE "," 

AS.CHKOPN .EQ $DEBB REQUIRE "(" 

AS.SYNCHR .EQ $DECO REQUIRE (A-REG) 

AS.SYNERR .EQ $DEC9 SYNTAX ERROR 

AS.PTRGET .EQ $DFE3 GET VARIABLE PNTR 

AS.GETSPA .EQ $E452 GET SPACE IN STRING AREA 

AS.MOVSTR .EQ $E5E2 COPY STRING DATA 

AS.FRETMP .EQ $E604 FREE TEMPORARY STRING 

AS.CONINT .EQ $E6FB CONVERT FAC TO 8-BITS 


Help Wanted? 


Assistant Programmer” 


Menu Generator and Screen Text Editor 

Accepts all characters from keyboard (including “[/ — _”). 

hifts individual lines or entire page with |-J-K-M keys. 
Splits a line or combines two lines at cursor position. 
I nserts input or variable print commands at cursor position. 

paces added or deleted between lines with a single keystroke. 
T ext file created to “EXEC” menu (BASIC) into your program. 
Accents your titles with borders, using minimum amount of bytes. 

oO disk swapping, entire program resides in memory for easy access. 
T ext file created that reinstalls screens for future development. 


Prints copy of menu in screen format with row and column edge scales. 
R enders line at cursor position inverse or flashing with keystroke. 
verhaul your existing menu with transparent capture routine. 
Gives printed list of input/print commands with row & column numbers. 
Right, left and center justification of menu at cursor position. 
All features and procedures fully documented and tutored. 
enus can be designed on the screen, no need for graph paper layouts. 
Makes horizontal lines print in vertical format at the touch of a key. 
E rror messages displayed for all options (display voidable). 
eturn coupon for your ticket to fast, efficient and friendly menus. 


ALL FOR ONLY $49.95. 


Requirements: Apple II Plus* with 48K & disc drive. 
*Apple Il is a registered trademark of 
Apple Computer, Inc. 


(@) S Barney Stone’s 
mopar MICRO MEM O Ll calendar/tickle file/phone listing 


Improving the Proven: completely compatible with Micro Memo 


py <\e $49.95 


RUSH O Assistant Programmer, 

1 Micro Memo Il, at once! 
0 Enclosed is check or money order for $49.95 each.* 
OJ Please ship COD (add $3.00 for COD charge). 


Dealer inquiries welcome. *Pa. residents add 6% sales tax. 


P.O. Box 387 
Flourtown PA 19031 “DRESS 
(215) 836-1056 City. STATE 
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MACHINE LANGUAGE SPEED 
xvpe er~Ma eT~IVLAY IE ic WHERE IT COUNTS... 


For the first time, Amper-Magic makes it easy for people who don’t know 
machine language to use its power! Now you can attach slick, finished machine 
language routines to your Applesoft programs in seconds! And interface them 
by name, not by address! 


You simply give each routine a name of your choice, perform the append pro- 
cedure once at about 15 seconds per routine, and the machine language becomes a 
permanent part of your BASIC program. (Of course, you can remove it if you want to.) 


Up to 255 relocatable machine language routines can be attached to a BASIC 
program and then called by name. We supply some 20 routines on this disk. More 
can be entered from magazines. And more library disks are in the works. 


These routines and more can be attached and accessed easily. For example, 
to allow the typing of commas and colons in a response (not normally allowed in 
Applesoft), you just attach the Input Anything routine and put this line in your program: 


xxx PRINT “PLEASE ENTER THE DATE.”; : & INPUT,DATES 


&-MAGIC makes it Easy to be Fast & Flexible! 
PRICE: $75 


&-Magic and Amper-Magic are trademarks of Anthro-Digital, Inc. 
Applesoft is a trademark of Apple Computer, Inc. 


IN YOUR PROGRAM! 


Some routines on this disk are: 


Binary file info 

Delete array 
Disassemble memory 
Dump variables 

Find substring 

Get 2-byte values 
Gosub to variable 
Goto to variable 

Hex memory dump 
Input anything 

Move memory 
Multiple poke decimal 
Multiple poke hex 
Print w/o word break 
Restore special data 
Spéed up Applesoft 
Speed restore 

Store 2-byte values 
Swap variables 


Anthro - Digital Software 


P.O. Box 1385 
Pittsfield, MA 01202 


. The People - Computers Connection 
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Star-tling StuntS.......ceeececeeeeeeeBill Morgan & Mike Laumer 


In most assemblers, including the S-C Macro Assembler, you can 
use the character "*" in the operand of an instruction to mean 
the current value of the location counter. (The location 
counter is a variable used by the assembler to keep track of 
where the next byte of object code goes.) Here are a couple of 
simple examples of using the *, from page 6-2 of the Macro 
Assembler manual: 


0800- 03 1000 QT .DA #QTSZ 

0801- 41 42 43 1010 .AS /ABC/ 

0003- 1020 QTSZ .EQ *-QT-1 
1030 

0804- 00 00 1040 VAR .DA *-* 
1050 

0806- 1060 FILLER .BS $900-* 

0900- 1070 END .EQ * 


The QT, QTSZ example uses the * to help calculate the length of 
a string of characters. The VAR line uses “*-*" to define a 
variable as having a value of zero. 


The expression labelled FILLER causes the assembler to skip 
ahead to $900. This has much the same effect as .OR $900, but 
it won't cause the assembler to close a target file, the way 
~OR would. 


One thing Bill wanted was an expression to have the assembly 
skip up to the beginning of the next page, no matter what that 
page might be. Here's what we came up with: 


0800- 34 12 1000 START .DA $1234 
0802- 1010 FILL -BS *+255/256*256-* 
0900- 45 23 1020 END ~DA $2345 


If you change the origin to $C00, END will move to $D00. With 
this coding, END will always be $100 above START. Note that 
there is no precedence when the assembler is evaluating an 
expression. Terms are taken strictly left-to-right. But 
notice how smart the expression cracker in the assembler is! 

It knows that a "*" between numbers or labels means "multiply", 
and a "*" between arithmetic operators means “location 
counter", 


In the American Heart Association CPR project Mike uses lots of 
overlays, and has to make sure that modules don't grow above a 
certain address. He does it by putting lines like these at the 
end of a module: 


1000 ~DO *>LIMIT 
1010 !!1 PROGRAM TOO BIG !!1! 
1020 ~FIN 
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Here's an example, to keep a program below the Hi-res pages: 


1000 -OR S1FFE 

1010 -DA $4321 

1020 -DO *>$2000 

1030 !!! PROGRAM TOO BIG !!1! 
1040 -FIN 


That will assemble just fine: 


1000 -OR S1FFE 

1FFE- 21 43 1010 ~DA $4321 
1020 -DO *>$2000 
1040 FIN 


0000 ERRORS IN ASSEMBLY 
But, try inserting another line: 

1015 eDA $1234 
Here's what happens: 


*** BAD OPCODE ERROR 
1030 !!! PROGRAM TOO BIG !!! 


0001 ERRORS IN ASSEMBLY 


The key to this technique is putting a couple of blanks at the 
beginning of line 1030. That way, the assembler tries to parse 
"tl!" as an opcode, and reports an error during pass one, 
before any code has been generated. 


You should be very careful about using "*", and experiment on a 
test disk when trying something new. For example, take another 
look at line 1060 in the first listing. If you put "*-$900" 
for the operand, that would be negative. The result would be 
SFFO7, which would try to write 65,287 zero bytes onto your 
target file. The next thing you see is probably DISK FULL! 


That's about all the tricky things we have room for right now. 
We hope these hints will help you to navigate "by the stars" in 
your programming. Just remember to experiment carefully with 
the * operand before using it in vital programs. There are 
¢lso many pitfalls on this road! 


Promising New Book 


I just received an advance copy of a forthcoming book by Jules 
Gilder (a long-time AAL subscriber), titled “Now That You Know 
Apple Assembly Language, What Can You Do With It?" As the 
title implies, this will be an intermediate level look at 
really using assembly language in your Apple. It looks good. 
As soon aS I have details about price and publication date, 
T'll let you know. 
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A Sometimes Useful Patch.....-..cesccccesesee BOD Sander-Cederlof 


Sometimes you would like to see all the hex bytes a macro 
produces, but not the expanded lines of source code. The >LIST 
MOFF directive turns off both, but with the following three 
byte patch you can see the hex bytes for each macro call. 


Motherboard version: :$218B:0 (was 03) 
:$21B3:0 (was 05) 
:$21E2:0 (was 10) 


RAM Card version: :$C083 C083 (enable writing) 
:SE2D7:0 (was 03) 
: SE2FF:0 (was 05) 
:S$E32E:0 (was 10) 


Don't make these into permanent patches, because there will be 
times when you want to use the .LIST directives normally. If 
you feel like making the changes often, you might make two 
separate versions of the assembler, or make some EXEC files to 
do the patching on demand. 


RAM/ROM PROGRAM DEVELOPMENT BOARD $35.00 
Plugs into any Apple slot. Holds one user-supplied 2Kx8 memory chip. Use a 6116 type RAN chip for 
program development or just extra memory. Plugin a programmed 2716 EPROM to keep your favorite routines 
‘on-line’. Maps into $Cn00-$CnFF and $C800-SCFFF memory space. Instructions & circuit diagram provided. 


The ’“MIRROR’ : Firmware for Apple-Cat $297.00 
Communications ROM plugs directly into Novation’s modem card. Three basic modes: Dumb Terminal, Remote 
Console & Programmable Modem. Added features include: Printer buffer, Pulse or Tone dialing, true 
dialtone detection, audible ring detect and ring-back option. Directly supports many 80-column boards 
(even while printing) and Apple’s Comm card commands. (Apple-Cat Hardware differences prevent 1007 
interchangability with Comm card.) Includes Hayes-to-AppleCat register equivalances for software 
conversion. Telephone Software Connection (213-516-9430) has several programs which support the. ‘MIRROR’. 


The “PERFORMER’: Smarts For Your Printer $49.00 
Get the most from your smart printer by adding intelligence to your ‘dumb’ interface card. The PERFORMER 
Board plugs into any Apple slot for immediate access (no programs to find and load). Easily select 
printer fonts and many other features via a user-friendly menu. Replaces manual printer set-up. No need 
to remember ESC commands. Also provides TEXT and GRAPHICS screen dumps. Compatible with Apple, Tymac, 
Epson, Microtek and similar ‘dumb’ Centronics type parallel I/F boards. Specify printer: | EPSON MX80 
W/6raftrax-80, EPSON MX100, EPSON HX80/4X100 W/Graftrax Plus, NEC 8023A, C.Itoh 8510 (Probriter), OKI 
Nicroline 82A/83A W/OKIGRAPH. (OKI Bonus: The PERFORMER Generates ENHANCED and DOUBLE STRIKE Fonts) 


Avoid A $3.00 Shipping/Handl ing Charge By Mailing Full Payment With Order 


RAK -WA RE 
41 Ralph Road 
West Orange NJ 07052 


Hatt SAY YOU SAU IT IN ‘APPLE ASSEMBLY LINE’! sa8e8 
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Source Code for a Word ProceSSOL...eeeeeee-ee-BObD Sander-Cederlof 


I finally have had to face it. I am never going to have time 
to finish the S-C word processor. It is certainly usable, 
because we have been using it here for months now. And we use 
it a lot, writing the newsletter, manuals, letters, etc. My 
father-in-law uses it, and so does my best friend, Fred. 
Fred's ll-year-old daughter is also uSing it, and loves it. 
She is currently typing a research paper using it. 


I know it is easy to use, because I didn't even give Fred a 
list of commands, let alone a reference manual. Of course, I 
did sit down with them for a few hours at the first, because 
they had never even seen a word processor before. 


In power, it is somewhere between Applewriter 1.1 and 
Applewriter II. It is similar in operation to Applewriter 1.1, 
and works in 40-column mode only. It requires a lower-case 
display and shift-key mod. 


It can read Applewriter 1.1 files, and instantly convert them 
to standard ASCII form. Normally it uses standard Apple text 
files (type T in the catalog). Of course, with Bobby Deen's 
help, I built in FAST read and write of those text files. 
Faster than binary files, actually. Something like 100 sectors 
in 7 seconds, if I remember correctly. 


I want to make a deal with you. I'll send you the complete 
commented source code on disk, together with a few sample text 
files. The text files will describe the command repertoire. 
Tf you are already familiar with Applewriter 1.1, you won't 
have any trouble at all. The assembled word processor will 
ulso be there, in case you don't have the S-C Macro Assembler. 


But if you do have my assembler, you can proceed to modify, 
improve, augment, enhance, and so on, to your heart's content. 


I'll send you the disk, if you'll send me $50. Or your charge 
card numbers, of course. I also want your commitment to keep 
this in the family. You know, don't go out and write a manual 
and wrap it in a fancy cover and call it YOUR product! 


If you do enhance it, send in your additions and we'll make 
this a joint effort. With all of us working on it, we may soon 
have the world's best word machine! 


Apple Assembly Line is published monthly by S-C SOFTWARE CORPORATION, P.O. Box 
280300, Dallas, Texas 75228. Phone (214) 324-2050. Subscription rate is $15 
per year in the USA, sent Bulk Mail; add $3 for First Class postage in USA, 
Canada, and Mexico; add $13 postage for other countries. Back issues are 
available for $1.50 each (other countries add $1 per back issue for postage). 


All .material herein is copyrighted by S-C SOFTWARE CORPORATION, all rights 
reserved. (Apple is a registered trademark of Apple Computer, Inc.) 
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